home *** CD-ROM | disk | FTP | other *** search
/ CyberMycha 2008 January / Cybermycha 1_2008.iso / Data.cab / _8DFF6C43EDCE4C54B37A0B3F68433CEC < prev    next >
Encoding:
Text File  |  2004-07-22  |  1.8 KB  |  77 lines
  1.  
  2. regc( 0, "TFACTOR" )
  3. regc4f( 3, %dirtcolor_r, %dirtcolor_g, %dirtcolor_b, 0.0 )
  4. regc4f( 4, %dirtsnow, %dirtgravel, %dirtmud, 0.0 )
  5. regc4f( 5, %daycolor_r, %daycolor_g, %daycolor_b, %daycolor_a )
  6. regc4f( 6, %ambient_r, %ambient_g, %ambient_b, %ambient_a )
  7.  
  8. pshader("
  9.  
  10. ps_1_4
  11.  
  12. #include <cardef.h>
  13.  
  14. #define    DirtLevel    c0.a
  15. #define DirtColor    c3
  16. #define    DirtType    c4
  17. #define    DayColor    c5
  18.  
  19. #define    Diffuse        v0.a
  20. #define SpotDiffuse v0
  21. #define Specular    v1
  22. #define Fresnel        v1.a
  23. #define Ambient     c6
  24. #define Lights      c0
  25.  
  26.     def     c7, 0, WATERDEEP, SHADOWSMUL, SOFTSHADOWS
  27. texld r0, t0      ;texture
  28. texld r1, t0      ;Dirt
  29. texld r2, t2      ;ColorMap
  30. texld r3, t3    ; Clouds
  31. texld r4, t4    ; Cubemap
  32. texld r5, t0    ; LightMask
  33.  
  34.     dp3_sat    r1.rgb, DirtType, r1
  35.  
  36.     mul_sat r1, r1.b, DirtLevel           ; dirtmask
  37.  
  38.     mad_x2_sat r2, r2.a, 1-r3.a, c7.a      ;  shadows  + SOFTSHADOWS
  39.  
  40.     dp3 r5.rgb, Lights, r5
  41.  
  42.     mul r4.rgb, r4, 1-r1
  43.     +mul r5.a, r5.b, 1-r1.b
  44.  
  45.     mul r5, r5.a, r0
  46.  
  47. phase
  48. texld r0, t0
  49. // r1 - dirtmask
  50. // r2 - shadows (przemnozyc przez 2(SHADOWSMUL)!)
  51. // r3 - empty
  52. // r4 - Cubemap*dirtmask
  53. // r5 - Lights
  54.  
  55.     mul r3.rgb, r0_x2.a, 1-r1.b   ; specularmask
  56.     +mul_sat    r1.a, r2.b, Diffuse
  57.  
  58.     lrp r0.rgb, r1.b, DirtColor, r0
  59.     +mad_sat r4.a, Fresnel, r3.b, r0_bx2.a   ; cubemap mask
  60.  
  61.     mul r4.rgb, r4, r4.a                ; cubemap
  62.     +mul_sat r3.a, r3.b, r2.b        ; final specular mask
  63.  
  64.     mad_sat r3.rgb, r3.a, Specular, r4                ; specular+cubemap
  65.     +mad_sat    r1.a, r1.a, Ambient.b, Ambient.a    ; final diffuse
  66.  
  67.     mad_sat r3, r0, r1.a, r3        ;   color*diffuse+specular+cubemap
  68.  
  69. #if VS_SPOTLIGHTS
  70.     mad_sat r5.rgb, r0, SpotDiffuse, r5
  71. #endif
  72.     mad_sat r0.rgb, r3, DayColor, r5
  73.     +mov r0.a, c7.g
  74.  
  75. ")
  76.  
  77.